home *** CD-ROM | disk | FTP | other *** search
/ FM Towns: Free Software Collection 10 / FM Towns Free Software Collection 10.iso / fb386 / tool / watanabe / short / speed.bas < prev    next >
BASIC Source File  |  1994-05-09  |  168b  |  8 lines
  1. 10 SCREEN@0:SCREEN 0:SS=1
  2. 20 T=TIME
  3. 24 WHILE T =TIME:WEND
  4. 30 T=TIME+SS-1:BEEP
  5. 35 WHILE T>=TIME:SP&=SP&+1:WEND
  6. 40 PRINT SS;"秒間に";SP&;"回処理しました。"
  7. 50 END
  8.